home *** CD-ROM | disk | FTP | other *** search
/ United Public Domain Gold 2 / United Public Domain Gold 2.iso / utilities / pu114.dms / pu114.adf / Scypmon / InstallLib next >
Text File  |  1993-06-14  |  902b  |  57 lines
  1. .k ""
  2. FailAt 20
  3.  
  4. set bcol0 "*E[40m"
  5. set bcol2 "*E[42m"
  6. set bold  "*E[1m"
  7. set nbold "*E[22m"
  8.  
  9. set libname "dis.library"
  10. set libver  "1.4"
  11.  
  12. set libnamet "$bold$libname$nbold"
  13. set libvert "$bold($libver)$nbold"
  14.  
  15. Echo "*n     $bcol2 $libnamet Installation Script $bcol0*n"
  16.  
  17. Version >NIL: LIBS:$libname
  18.  
  19. If NOT ERROR
  20.     Echo "The following version of $libnamet is currently in LIBS:" 
  21.     Version LIBS:$libname
  22.     Echo " "
  23. Else
  24.     Echo "*nNo existing $libnamet in LIBS:*n"
  25. EndIf
  26.  
  27. Ask "Install $libnamet version: $libvert ?"
  28. If NOT WARN
  29.    Skip Aborted
  30. EndIf
  31.  
  32. Copy libs/$libname LIBS:$libname
  33. Echo "*n$libnamet $libvert copied to your LIBS: directory."
  34.  
  35. Echo "*nInstallation complete.*n"
  36. Skip END
  37.  
  38. Lab ABORTED
  39.  
  40. Echo "*nInstallation aborted!*n"
  41.  
  42. Lab END
  43.  
  44. unset libname
  45. unset libver
  46. unset libnamet
  47. unset libvert
  48. unset bcol0
  49. unset bcol2
  50.  
  51. Echo "*n*E[3mClick the close gadget to continue! *E[23m*n"
  52.  
  53. Wait 2
  54. EndCLI >NIL:
  55.  
  56.  
  57.